home *** CD-ROM | disk | FTP | other *** search
/ The Ultimate Frank Lloyd…ght - America's Architect / Ultimate Frank Lloyd Wright, The - America's Architect (1994)(Microsoft Home).iso / pre / flw / flwlb.dir / 00196_Script_196 < prev    next >
Text File  |  1994-11-15  |  1KB  |  52 lines
  1. on startMovie
  2.   cursor 4
  3.   global currMM
  4.   set currMM = "FLWWT"
  5.   preLoadCast 1,2
  6.   repeat with i = 21 to 23
  7.     puppetSprite i, TRUE
  8.     set the immediate of sprite i to TRUE
  9.   end repeat
  10.   set the stretch of sprite 23 to FALSE
  11. end startMovie
  12.  
  13. on stepMovie
  14.   global nowFrame,currFrame
  15.   if nowFrame  <> currFrame then
  16.     seeAlsoList
  17.     set currFrame = nowFrame
  18.   end if
  19. end stepMovie
  20.  
  21. on saveLocals
  22.   global lastMovie, lastFrame, nowFrame
  23.   set lastFrame = nowFrame
  24.   set lastMovie = "FLWLB"
  25. end saveLocals
  26.  
  27. on stopMovie
  28.   set the castNum of sprite 21 to 1050
  29.   puppetSprite 21, FALSE
  30.   put " " into field "SeeAlsoText"
  31.   updateStage
  32. end stopMovie
  33.  
  34. on buttonState
  35.   global FrankNav, bFlag
  36.   rollCheck
  37.   if (the mouseV > 200) or (bFlag = TRUE) then
  38.     doState
  39.   end if
  40. end buttonState
  41.  
  42. on rollCheck
  43.   global pos
  44.   if the mouseH>=27 and the mouseH<=347 and the mouseV>67 and the mouseV<307 then
  45.     set pos = 2
  46.     cursor [1067,1068]
  47.   else
  48.     set pos = 0
  49.     cursor -1
  50.   end if
  51. end rollCheck
  52.